home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue63 / Construc / CUnit.dfm < prev    next >
Encoding:
Text File  |  2000-10-04  |  1.6 KB  |  77 lines
  1. object Form2: TForm2
  2.   Left = 320
  3.   Top = 163
  4.   Width = 562
  5.   Height = 365
  6.   Caption = 'Socket Client'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   OnActivate = FormActivate
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object DBGrid1: TDBGrid
  18.     Left = 96
  19.     Top = 64
  20.     Width = 449
  21.     Height = 265
  22.     DataSource = DataSource1
  23.     TabOrder = 0
  24.     TitleFont.Charset = DEFAULT_CHARSET
  25.     TitleFont.Color = clWindowText
  26.     TitleFont.Height = -11
  27.     TitleFont.Name = 'MS Sans Serif'
  28.     TitleFont.Style = []
  29.   end
  30.   object DBNavigator1: TDBNavigator
  31.     Left = 96
  32.     Top = 16
  33.     Width = 240
  34.     Height = 25
  35.     DataSource = DataSource1
  36.     TabOrder = 1
  37.   end
  38.   object Button1: TButton
  39.     Left = 376
  40.     Top = 16
  41.     Width = 75
  42.     Height = 25
  43.     Caption = 'Connect'
  44.     TabOrder = 2
  45.     OnClick = Button1Click
  46.   end
  47.   object Button2: TButton
  48.     Left = 472
  49.     Top = 16
  50.     Width = 75
  51.     Height = 25
  52.     Caption = 'Activate'
  53.     TabOrder = 3
  54.     OnClick = Button2Click
  55.   end
  56.   object ClientSocket1: TClientSocket
  57.     Active = False
  58.     Address = '192.168.92.201'
  59.     ClientType = ctNonBlocking
  60.     Port = 4242
  61.     OnRead = ClientSocket1Read
  62.     Left = 32
  63.     Top = 24
  64.   end
  65.   object ClientDataSet1: TClientDataSet
  66.     Aggregates = <>
  67.     Params = <>
  68.     Left = 32
  69.     Top = 88
  70.   end
  71.   object DataSource1: TDataSource
  72.     DataSet = ClientDataSet1
  73.     Left = 32
  74.     Top = 152
  75.   end
  76. end
  77.